home *** CD-ROM | disk | FTP | other *** search
- object InvoiceReportForm: TInvoiceReportForm
- Left = 181
- Top = 123
- Width = 784
- Height = 578
- HorzScrollBar.Range = 1200
- VertScrollBar.Range = 2000
- AutoScroll = False
- Caption = 'InvoiceReportForm'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- Scaled = False
- PixelsPerInch = 96
- TextHeight = 14
- object TitleBand: TQRBand
- Left = 0
- Top = 0
- Width = 1200
- Height = 80
- Align = alTop
- BandType = rbTitle
- Color = clSilver
- ForceNewPage = False
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Ruler = qrrNone
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 97
- Height = 75
- Picture.Data = {<image000.bmp>}
- end
- object QRShape1: TQRShape
- Left = 0
- Top = 75
- Width = 770
- Height = 5
- Brush.Color = clNavy
- Shape = qrsRectangle
- end
- object QRLabel1: TQRLabel
- Left = 112
- Top = 48
- Width = 281
- Height = 25
- Caption = 'Marine Adventures, Inc.'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlue
- Font.Height = -21
- Font.Name = 'Billboard'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- end
- object QRLabel2: TQRLabel
- Left = 520
- Top = 8
- Width = 101
- Height = 34
- Caption = 'Invoice'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clRed
- Font.Height = -29
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- end
- object MainBand: TQRBand
- Left = 0
- Top = 80
- Width = 1200
- Height = 169
- Align = alTop
- BandType = rbDetail
- Color = clWhite
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ForceNewPage = False
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- LinkBand = PartsBand
- ParentFont = False
- Ruler = qrrNone
- object QRLabel3: TQRLabel
- Left = 8
- Top = 4
- Width = 99
- Height = 12
- Caption = 'Bill To Address:'
- AlignToBand = False
- Color = clNavy
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRDBText1: TQRDBText
- Left = 8
- Top = 24
- Width = 241
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Company'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRDBText2: TQRDBText
- Left = 8
- Top = 41
- Width = 175
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Addr1'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText3: TQRDBText
- Left = 192
- Top = 41
- Width = 75
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Addr2'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText4: TQRDBText
- Left = 8
- Top = 58
- Width = 137
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'City'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText5: TQRDBText
- Left = 147
- Top = 58
- Width = 134
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'State'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText6: TQRDBText
- Left = 8
- Top = 75
- Width = 129
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Country'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText7: TQRDBText
- Left = 151
- Top = 75
- Width = 65
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Zip'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel4: TQRLabel
- Left = 392
- Top = 4
- Width = 107
- Height = 12
- Caption = 'Ship To Address:'
- AlignToBand = False
- Color = clNavy
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRShape2: TQRShape
- Left = 376
- Top = 4
- Width = 3
- Height = 105
- Brush.Color = clRed
- Shape = qrsRectangle
- end
- object QRDBText8: TQRDBText
- Left = 392
- Top = 24
- Width = 201
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToContact'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRDBText9: TQRDBText
- Left = 392
- Top = 41
- Width = 175
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToAddr1'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText10: TQRDBText
- Left = 569
- Top = 41
- Width = 88
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToAddr2'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText11: TQRDBText
- Left = 392
- Top = 58
- Width = 138
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToCity'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText12: TQRDBText
- Left = 530
- Top = 58
- Width = 119
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToState'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText13: TQRDBText
- Left = 392
- Top = 75
- Width = 129
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToCountry'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText14: TQRDBText
- Left = 544
- Top = 75
- Width = 65
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToZip'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText15: TQRDBText
- Left = 392
- Top = 92
- Width = 169
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipToPhone'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel5: TQRLabel
- Left = 0
- Top = 112
- Width = 776
- Height = 12
- AutoSize = False
- Caption =
- ' Order No. Cust No. Sales Person ' +
- ' Sales Date Ship Date Ship Vi' +
- 'a '
- AlignToBand = False
- Color = clNavy
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRDBText16: TQRDBText
- Left = 8
- Top = 130
- Width = 65
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'OrderNo'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText17: TQRDBText
- Left = 104
- Top = 130
- Width = 57
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'CustNo'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText18: TQRDBText
- Left = 200
- Top = 130
- Width = 43
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'FirstName'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText19: TQRDBText
- Left = 247
- Top = 130
- Width = 65
- Height = 17
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'LastName'
- end
- object QRDBText20: TQRDBText
- Left = 368
- Top = 130
- Width = 73
- Height = 17
- Alignment = taCenter
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'SaleDate'
- end
- object QRDBText21: TQRDBText
- Left = 464
- Top = 130
- Width = 129
- Height = 17
- Alignment = taCenter
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipDate'
- end
- object QRDBText22: TQRDBText
- Left = 608
- Top = 130
- Width = 73
- Height = 17
- Alignment = taCenter
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ShipVIA'
- end
- object QRLabel6: TQRLabel
- Left = 0
- Top = 152
- Width = 776
- Height = 12
- AutoSize = False
- Caption =
- ' Part No. Description ' +
- ' Quantity List Price Discount Ex' +
- 'tended Price'
- AlignToBand = False
- Color = clNavy
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- end
- object PartsBand: TQRBand
- Left = 0
- Top = 249
- Width = 1200
- Height = 18
- Align = alTop
- BandType = rbSubDetail
- Color = clWhite
- ForceNewPage = False
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Ruler = qrrNone
- object QRDBText23: TQRDBText
- Left = 16
- Top = 1
- Width = 57
- Height = 16
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'PartNo'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText24: TQRDBText
- Left = 104
- Top = 1
- Width = 257
- Height = 16
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Description'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText25: TQRDBText
- Left = 368
- Top = 1
- Width = 41
- Height = 16
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Qty'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText26: TQRDBText
- Left = 440
- Top = 1
- Width = 73
- Height = 16
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ListPrice'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText27: TQRDBText
- Left = 528
- Top = 1
- Width = 49
- Height = 16
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Discount'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText28: TQRDBText
- Left = 624
- Top = 1
- Width = 80
- Height = 16
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ExtendedPrice'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- end
- object QRBand1: TQRBand
- Left = 0
- Top = 267
- Width = 1200
- Height = 158
- Align = alTop
- BandType = rbSummary
- Color = clWhite
- ForceNewPage = False
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Ruler = qrrNone
- object QRShape3: TQRShape
- Left = 0
- Top = 0
- Width = 776
- Height = 1
- Brush.Color = clBlack
- Shape = qrsRectangle
- end
- object QRDBText29: TQRDBText
- Left = 616
- Top = 2
- Width = 88
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'ItemsTotal'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel7: TQRLabel
- Left = 536
- Top = 2
- Width = 51
- Height = 16
- Caption = 'SubTotal'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel8: TQRLabel
- Left = 536
- Top = 20
- Width = 21
- Height = 16
- Caption = 'Tax'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText30: TQRDBText
- Left = 624
- Top = 20
- Width = 80
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'TaxTotal'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText31: TQRDBText
- Left = 624
- Top = 38
- Width = 80
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Freight'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel9: TQRLabel
- Left = 536
- Top = 37
- Width = 40
- Height = 16
- Caption = 'Freight'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRShape4: TQRShape
- Left = 536
- Top = 56
- Width = 169
- Height = 2
- Brush.Color = clBlack
- Shape = qrsRectangle
- end
- object QRDBText32: TQRDBText
- Left = 624
- Top = 60
- Width = 81
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'Total'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRLabel10: TQRLabel
- Left = 536
- Top = 60
- Width = 28
- Height = 16
- Caption = 'Total'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText33: TQRDBText
- Left = 624
- Top = 78
- Width = 80
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'AmountPaid'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRShape5: TQRShape
- Left = 536
- Top = 96
- Width = 169
- Height = 2
- Brush.Color = clBlack
- Shape = qrsRectangle
- end
- object QRLabel11: TQRLabel
- Left = 536
- Top = 78
- Width = 75
- Height = 16
- Caption = 'Amount Paid'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object QRDBText34: TQRDBText
- Left = 624
- Top = 100
- Width = 80
- Height = 17
- Alignment = taRightJustify
- AlignToBand = False
- DataSource = MastData.InvoiceQrySrc
- DataField = 'AmoutDue'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRLabel12: TQRLabel
- Left = 536
- Top = 100
- Width = 78
- Height = 16
- Caption = 'Amount Due'
- AlignToBand = False
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- end
- object InvoiceReport: TQuickReport
- DataSource = MastData.InvoiceQrySrc
- ColumnMarginInches = 0
- ColumnMarginMM = 0
- Columns = 1
- DisplayPrintDialog = False
- LeftMarginInches = 0
- LeftMarginMM = 0
- Orientation = poPortrait
- PageFrame.DrawTop = False
- PageFrame.DrawBottom = False
- PageFrame.DrawLeft = False
- PageFrame.DrawRight = False
- PaperLength = 0
- PaperSize = qrpDefault
- PaperWidth = 0
- RestartData = True
- SQLCompatible = False
- TitleBeforeHeader = False
- Left = 16
- Top = 448
- end
- object PartsDetailLink: TQRDetailLink
- DataSource = MastData.InvoiceQrySrc
- DetailBand = PartsBand
- Master = InvoiceReport
- PrintBefore = False
- Left = 56
- Top = 448
- end
- end
-